Replace last-command-char with last-command-event.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 08b9fa6a9969440ab7bd3502dc750d4eeb07939e..2e321a6d71aeb760a1ac7c71575acc57e97ce687 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -7,6 +7,7 @@
        * calc/calc-keypd.el, calc/calc-misc.el, calc/calc-prog.el:
        * calc/calc-sel.el, calc/calc-store.el, calc/calc-stuff.el:
        * calc/calc-units.el, calc/calc-yank.el, calc/calc.el:
+       * play/mpuz.el:
        * progmodes/ada-mode.el, progmodes/antlr-mode.el, progmodes/cc-align.el:
        * progmodes/cc-cmds.el, progmodes/cperl-mode.el, progmodes/f90.el:
        * progmodes/fortran.el, progmodes/icon.el, progmodes/idlwave.el:

diff --git a/lisp/play/mpuz.el b/lisp/play/mpuz.el
index 5c03e7a09d2a6916325b19340629dcaba58347d8..5725bc1d82579343ea074e11fcaab9d4b7c86eed 100644 (file)
--- a/lisp/play/mpuz.el
+++ b/lisp/play/mpuz.el
@@ -1,7 +1,7 @@
 ;;; mpuz.el --- multiplication puzzle for GNU Emacs
 
-;; Copyright (C) 1990, 2001, 2002, 2003, 2004, 2005,
-;;   2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1990, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008,
+;;   2009  Free Software Foundation, Inc.
 
 ;; Author: Philippe Schnoebelen <phs@lsv.ens-cachan.fr>
 ;; Overhauled: Daniel Pfeiffer <occitan@esperanto.org>
@@ -424,7 +424,7 @@ You may abort a game by typing \\<mpuz-mode-map>\\[mpuz-offer-abort]."
   (interactive)
   (if mpuz-in-progress
       (let (letter-char digit digit-char message)
-       (setq letter-char (upcase last-command-char)
+       (setq letter-char (upcase last-command-event)
              digit (mpuz-to-digit (- letter-char ?A)))
        (cond ((mpuz-digit-solved-p digit)
               (message "%c already solved." letter-char)